Skunkware 5/Skunkware 5.iso/lib/logolib/gensym

Text File | 1995-05-03 | 149b | 8 lines

to gensym
if not namep "gensym.number [make "gensym.number 0]
make "gensym.number :gensym.number + 1
output word "g :gensym.number
end

bury "gensym